home *** CD-ROM | disk | FTP | other *** search
/ CBM Funet Archive / cbm-funet-archive-2003.iso / cbm / c64 / demos / generic / Demos.lzh / +self destruct (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1993-12-17  |  255 b   |  5 lines
  1. 5 f$="self destruct"
  2. 10 poke53281,0:poke53280,12:print"[147][142][144]load"chr$(34)f$chr$(34)",8"
  3. 20 print"run";:poke198,2:poke631,13:poke632,13
  4. 30 poke44,32:poke43,1:poke8192,0:new
  5.